<?php

/**
 * @file
 * Attribute administration menu items.
 */

/**
 * Displays a paged list and overview of existing product attributes.
 */
function uc_attribute_admin() {
    $header = array(
        array('data' => t('Name'), 'field' => 'name', 'sort' => 'asc'),
        array('data' => t('Label'), 'field' => 'label'),
        t('Required'),
        array('data' => t('List position'), 'field' => 'ordering'),
        t('Number of options'),
        t('Display type'),
        t('Operations'),
    );

    $display_types = _uc_attribute_display_types();

    $rows = array();

    $result = pager_query("SELECT aid, name, label, required, ordering, display FROM {uc_attributes}" . tablesort_sql($header), 30, 0);
    while ($attr = db_fetch_object($result)) {
        $attr->options = db_result(db_query('SELECT COUNT(*) FROM {uc_attribute_options} WHERE aid = %d', $attr->aid));
        if (empty($attr->label)) {
            $attr->label = $attr->name;
        }
        $ops = array(
            l(t('edit'), 'admin/store/attributes/' . $attr->aid . '/edit'),
            l(t('options'), 'admin/store/attributes/' . $attr->aid . '/options'),
            l(t('delete'), 'admin/store/attributes/' . $attr->aid . '/delete'),
        );
        $rows[] = array(
            check_plain($attr->name),
            check_plain($attr->label),
            $attr->required == 1 ? t('Yes') : t('No'),
            array('data' => $attr->ordering, 'align' => 'center'),
            array('data' => $attr->options, 'align' => 'center'),
            $display_types[$attr->display],
            implode(' ', $ops),
        );
    }

    if (count($rows) == 0) {
        $rows[] = array(
            array('data' => t('No product attributes have been added yet.'), 'colspan' => '6')
        );
    }

    $output = theme('table', $header, $rows) . theme('pager', NULL, 30)
            . l(t('Add an attribute'), 'admin/store/attributes/add');

    return $output;
}

/**
 * Form builder for product attributes.
 *
 * @see uc_attribute_form_submit()
 * @ingroup forms
 */
function uc_attribute_form($form_state, $attribute = NULL) {
    // If an attribute specified, add its ID as a hidden value.

    if (!empty($attribute)) {
        $form['aid'] = array('#type' => 'hidden', '#value' => $attribute->aid);
        drupal_set_title(t('Edit attribute: %name', array('%name' => $attribute->name)));
    }

    if (isset($attribute->name)) {
        if (empty($attribute->label)) {
            $attribute->label = $attribute->name;
        }
        $name = $attribute->name;
        $label = $attribute->label;
    } else {
        $name = $label = '';
    }
    $form['name'] = array(
        '#type' => 'textfield',
        '#title' => t('Name'),
        '#description' => t('The name of the attribute used in administrative forms'),
        '#default_value' => $name,
        '#required' => TRUE,
    );
    $form['label'] = array(
        '#type' => 'textfield',
        '#title' => t('Label'),
        '#description' => t("Enter a label that customers will see instead of the attribute name. Use &lt;none&gt; if you don't want a title to appear at all."),
        '#default_value' => $label,
    );
    $form['description'] = array(
        '#type' => 'textfield',
        '#title' => t('Help text'),
        '#description' => t('<b>Optional.</b> Enter the help text that will display beneath the attribute on product add to cart forms.'),
        '#default_value' => isset($attribute->description) ? $attribute->description : '',
        '#maxlength' => 255,
    );
    $form['required'] = array(
        '#type' => 'checkbox',
        '#title' => t('Make this attribute required, forcing the customer to choose an option.'),
        '#description' => t('Selecting this for an attribute will disregard any default option you specify.<br />May be overridden at the product level.'),
        '#default_value' => isset($attribute->required) ? $attribute->required : 0,
    );
    $form['display'] = array(
        '#type' => 'select',
        '#title' => t('Display type'),
        '#description' => t('This specifies how the options for this attribute will be presented.<br />May be overridden at the product level.'),
        '#options' => _uc_attribute_display_types(),
        '#default_value' => isset($attribute->display) ? $attribute->display : 1,
    );
    $form['ordering'] = array(
        '#type' => 'weight',
        '#delta' => 25,
        '#title' => t('List position'),
        '#description' => t('Multiple attributes on an add to cart form are sorted by this value and then by their name.<br />May be overridden at the product level.'),
        '#default_value' => isset($attribute->ordering) ? $attribute->ordering : 0,
    );

    $form['submit'] = array(
        '#type' => 'submit',
        '#value' => t('Submit'),
        '#suffix' => l(t('Cancel'), 'admin/store/attributes'),
    );

    return $form;
}

/**
 * Form submission handler for uc_attribute_form().
 *
 * @see uc_attribute_form()
 */
function uc_attribute_form_submit($form, &$form_state) {
    if (!empty($form_state['values']['aid'])) {
        db_query("UPDATE {uc_attributes} SET name = '%s', label = '%s', ordering = %d, required = %d, display = %d, description = '%s' WHERE aid = %d", $form_state['values']['name'], $form_state['values']['label'], $form_state['values']['ordering'], $form_state['values']['required'], $form_state['values']['display'], $form_state['values']['description'], $form_state['values']['aid']);
    } else {
        db_query("INSERT INTO {uc_attributes} (name, label, ordering, required, display, description) VALUES ('%s', '%s', %d, %d, %d, '%s')", $form_state['values']['name'], $form_state['values']['label'], $form_state['values']['ordering'], $form_state['values']['required'], $form_state['values']['display'], $form_state['values']['description']);
        $form_state['values']['aid'] = db_last_insert_id('uc_attributes', 'aid');
    }

    $form_state['redirect'] = 'admin/store/attributes';
}

/**
 * Confirms the deletion of the given attribute.
 *
 * @see uc_attribute_delete_confirm_submit()
 */
function uc_attribute_delete_confirm($form_state, $attribute) {
    // If we got a bunk attribute, kick out an error message.
    if (empty($attribute)) {
        drupal_set_message(t('There is no attribute with that ID.'), 'error');
        drupal_goto('admin/store/attributes');
    }

    $form['aid'] = array('#type' => 'value', '#value' => $attribute->aid);
    $form['#redirect'] = 'admin/store/attributes';

    $count = db_result(db_query("SELECT COUNT(*) FROM {uc_product_attributes} WHERE aid = %d", $attribute->aid));

    $output = confirm_form($form, t('Are you sure you want to delete the attribute %name?', array('%name' => $attribute->name)), 'admin/store/attributes', format_plural($count, 'There is @count product with this attribute.', 'There are @count products with this attribute.'), t('Delete'), t('Cancel'));

    return $output;
}

/**
 * Form submission handler for uc_attribute_delete_confirm().
 *
 * @see uc_attribute_delete_confirm()
 */
function uc_attribute_delete_confirm_submit($form, &$form_state) {
    if ($form_state['values']['confirm']) {
        db_query("DELETE FROM {uc_class_attribute_options} WHERE EXISTS (SELECT * FROM {uc_attribute_options} AS ao WHERE {uc_class_attribute_options}.oid = ao.oid AND ao.aid = %d)", $form_state['values']['aid']);
        db_query("DELETE FROM {uc_class_attributes} WHERE aid = %d", $form_state['values']['aid']);
        db_query("DELETE FROM {uc_product_options} WHERE EXISTS (SELECT * FROM {uc_attribute_options} AS ao WHERE {uc_product_options}.oid = ao.oid AND ao.aid = %d)", $form_state['values']['aid']);
        db_query("DELETE FROM {uc_product_adjustments} WHERE EXISTS (SELECT * FROM {uc_product_attributes} AS pa WHERE {uc_product_adjustments}.nid = pa.nid AND pa.aid = %d)", $form_state['values']['aid']);
        db_query("DELETE FROM {uc_product_attributes} WHERE aid = %d", $form_state['values']['aid']);
        db_query("DELETE FROM {uc_attribute_options} WHERE aid = %d", $form_state['values']['aid']);
        db_query("DELETE FROM {uc_attributes} WHERE aid = %d", $form_state['values']['aid']);
        drupal_set_message(t('Product attribute deleted.'));
    }
}

/**
 * Form builder for bulk product updates.
 *
 * @see uc_attribute_bulk_update_flush()
 * @see uc_attribute_bulk_update_flush_all()
 * @see theme_uc_attribute_bulk_update_form()
 * @ingroup forms
 */
function uc_attribute_bulk_update_form($form_state, $class) {
    drupal_set_title(check_plain($class->name));

    $form['node_type'] = array(
        '#type' => 'value',
        '#value' => $class->pcid,
    );

    // Select all products with current class.
    $result = pager_query("SELECT n.nid, n.title, n.status, nt.name FROM {node} n LEFT JOIN {node_type} nt ON nt.type = n.type WHERE nt.type = '%s'", 50, 0, NULL, $class->pcid);
    $nodes = array();
    while ($node = db_fetch_object($result)) {
        $nodes[$node->nid] = '';
        $form['title'][$node->nid] = array('#value' => l($node->title, 'node/' . $node->nid));
        $form['status'][$node->nid] = array('#value' => ($node->status ? t('published') : t('not published')));
        $form['type'][$node->nid] = array('#value' => check_plain($node->name));
    }

    $form['nodes'] = array('#type' => 'checkboxes', '#options' => $nodes);

    $form['flush'] = array(
        '#type' => 'submit',
        '#value' => t('Flush selected'),
        '#submit' => array('uc_attribute_bulk_update_flush'),
    );
    $form['flush_all'] = array(
        '#type' => 'submit',
        '#value' => t('Flush all'),
        '#submit' => array('uc_attribute_bulk_update_flush_all'),
    );

    $form['pager'] = array('#value' => theme('pager', NULL, 50, 0));

    return $form;
}

/**
 * Displays the bulk product update form.
 *
 * @see uc_attribute_bulk_update_form()
 * @ingroup themeable
 */
function theme_uc_attribute_bulk_update_form($form) {
    $output = '';

    $has_products = isset($form['title']) && is_array($form['title']);

    $header[] = theme('table_select_header_cell');
    $header[] = t('Title');
    $header[] = t('Status');
    $header[] = t('Type');

    if ($has_products) {
        foreach (element_children($form['title']) as $key) {
            $row = array();
            $row[] = drupal_render($form['nodes'][$key]);
            $row[] = drupal_render($form['title'][$key]);
            $row[] = drupal_render($form['status'][$key]);
            $row[] = drupal_render($form['type'][$key]);
            $rows[] = $row;
        }
    } else {
        $rows[] = array(array('data' => t('No products available.'), 'colspan' => '6'));
    }

    $output .= theme('table', $header, $rows);
    if ($form['pager']['#value']) {
        $output .= drupal_render($form['pager']);
    }

    $output .= drupal_render($form);

    $output .= '<p>' . t('Flush actions take place immediately and cannot be undone.') . '</p>';

    return $output;
}

/**
 * Form submission handler for uc_attribute_bulk_update_form().
 *
 * @see uc_attribute_bulk_update_form()
 */
function uc_attribute_bulk_update_flush($form, &$form_state) {
    $nodes = array_filter($form_state['values']['nodes']);
    foreach ($nodes as $nid) {
        $node = node_load($nid);
        uc_attribute_node_reset($node);
    }
    drupal_set_message(t("Bulk update completed successfully on selected products."));
}

/**
 * Form submission handler for uc_attribute_bulk_update_form().
 *
 * @see uc_attribute_bulk_update_form()
 */
function uc_attribute_bulk_update_flush_all($form, &$form_state) {
    $result = db_query("SELECT nid FROM {node} WHERE type = '%s'", $form_state['values']['node_type']);
    while ($item = db_fetch_object($result)) {
        $node = node_load($item->nid);
        uc_attribute_node_reset($node);
    }
    drupal_set_message(t("Bulk update completed successfully on all products in this class."));
}

/**
 * Changes the display of attribute option prices.
 *
 * @ingroup forms
 */
function uc_attribute_admin_settings() {
    $form = array();

    $form['uc_attribute_option_price_format'] = array(
        '#type' => 'radios',
        '#title' => t('Option price format'),
        '#default_value' => variable_get('uc_attribute_option_price_format', 'adjustment'),
        '#options' => array('none' => t('Do not display'),
            'adjustment' => t('Display price adjustment'),
            'total' => t('Display total price'),
        ),
        '#description' => t('Determines how price variations are displayed to the customer.  Prices may be displayed directly next to each attribute option in the attribute selection form either as a total price for the product with that option or as an adjustment (+ or -) showing how that option affects the product base price.  However, the total price will not be displayed if a product has more than one attribute that can affect the price.'),
    );

    return system_settings_form($form);
}

/**
 * Displays options and the modifications to products they represent.
 *
 * @see uc_attribute_options_form_validate()
 * @see uc_attribute_options_form_submit()
 * @ingroup forms
 */
function uc_attribute_options_form($form_state, $attribute) {
    $form = array();

    // Set an appropriate title.
    drupal_set_title(t('Options for %name', array('%name' => $attribute->name)));

    // Store the attribute ID in the form array.
    $form['aid'] = array(
        '#type' => 'value',
        '#value' => $attribute->aid,
    );

    $context = array(
        'revision' => 'themed',
        'type' => 'attribute_option',
        'subject' => array(
            'attribute' => $attribute,
        ),
    );

    $form['options'] = array();

    // Loop through all the options on an attribute.
    foreach ($attribute->options as $key => $data) {
        $form['options'][$key] = array(
            'name' => array(
                '#value' => check_plain($data->name),
            ),
            'cost' => array(
                '#value' => $data->cost,
            ),
            'price' => array(
                '#value' => $data->price,
            ),
            'weight' => array(
                '#value' => $data->weight,
            ),
            'ordering' => array(
                '#type' => 'weight',
                '#delta' => 50,
                '#default_value' => $data->ordering,
                '#attributes' => array('class' => 'uc-attribute-option-table-ordering'),
            ),
            'ops' => array(
                '#value' => l(t('edit'), 'admin/store/attributes/' . $attribute->aid . '/options/' . $key . '/edit') . ' ' .
                l(t('delete'), 'admin/store/attributes/' . $attribute->aid . '/options/' . $key . '/delete'),
            ),
        );

        $context['subject']['option'] = $data;
        $context['field'] = 'cost';
        $form['options'][$key]['cost']['#value'] = uc_price($data->cost, $context);

        $context['field'] = 'price';
        $form['options'][$key]['price']['#value'] = uc_price($data->price, $context);
    }

    if (count($form['options'])) {
        $form['options']['#tree'] = TRUE;

        $form['submit'] = array(
            '#type' => 'submit',
            '#value' => t('Save changes'),
            '#weight' => 10,
        );
    }

    return $form;
}

/**
 * Form submission handler for uc_attribute_options_form().
 *
 * @see uc_attribute_options_form()
 * @see uc_object_options_form_submit()
 */
function uc_attribute_options_form_submit($form, &$form_state) {
    foreach ($form_state['values']['options'] as $oid => $option) {
        db_query("UPDATE {uc_attribute_options} SET ordering = %d WHERE oid = %d", $option['ordering'], $oid);
    }

    drupal_set_message(t('The changes have been saved.'));
}

/**
 * Formats an attribute and its options.
 *
 * @ingroup themeable
 */
function theme_uc_attribute_options_form($form) {

    $header = array(t('Name'), t('Default cost'), t('Default price'), t('Default weight'), array('data' => t('List position'), 'sort' => 'asc'), t('Operations'));

    if (count(element_children($form['options'])) > 0) {
        foreach (element_children($form['options']) as $oid) {
            $row = array(
                drupal_render($form['options'][$oid]['name']),
                drupal_render($form['options'][$oid]['cost']),
                drupal_render($form['options'][$oid]['price']),
                drupal_render($form['options'][$oid]['weight']),
                drupal_render($form['options'][$oid]['ordering']),
                drupal_render($form['options'][$oid]['ops']),
            );

            $rows[] = array(
                'data' => $row,
                'class' => 'draggable',
            );
        }
    } else {
        $rows[] = array(
            array('data' => t('No options for this attribute have been added yet.'), 'colspan' => 6),
        );
    }

    drupal_add_tabledrag('uc-attribute-option-table', 'order', 'sibling', 'uc-attribute-option-table-ordering');

    $output = theme('table', $header, $rows, array('id' => 'uc-attribute-option-table'));

    $output .= drupal_render($form);

    $output .= l(t('Add an option'), 'admin/store/attributes/' . $form['aid']['#value'] . '/options/add');

    return $output;
}

/**
 * Form builder for attribute options.
 *
 * @see uc_attribute_option_form_validate()
 * @see uc_attribute_option_form_submit()
 * @ingroup forms
 */
function uc_attribute_option_form($form_state, $attribute, $option = NULL) {
    // If we got a bunk attribute, kick out an error message.
    if (empty($attribute)) {
        drupal_set_message(t('There is no attribute with that ID.'), 'error');
        drupal_goto('admin/store/attributes');
    }
    $aid = $attribute->aid;

    $form['aid'] = array('#type' => 'hidden', '#value' => $aid);

    if (!empty($option)) {
        $form['oid'] = array('#type' => 'hidden', '#value' => $option->oid);
        drupal_set_title(t('Edit option: %name', array('%name' => $option->name)));
    } else {
        $option = new stdClass();
        $option->name = '';
        $option->ordering = 0;
        $option->cost = 0;
        $option->price = 0;
        $option->weight = 0;

        drupal_set_title(t('Options for %name', array('%name' => $attribute->name)));
    }

    $form['name'] = array(
        '#type' => 'textfield',
        '#title' => t('Name'),
        '#description' => t('This name will appear to customers on product add to cart forms.'),
        '#default_value' => $option->name,
        '#required' => TRUE,
        '#weight' => 0,
    );
    $form['ordering'] = array(
        '#type' => 'weight',
        '#delta' => 50,
        '#title' => t('List position'),
        '#description' => t('Options will be listed sorted by this value and then by their name.<br />May be overridden at the product level.'),
        '#default_value' => isset($option->ordering) ? $option->ordering : 0,
        '#weight' => 4,
    );
    $form['adjustments'] = array(
        '#type' => 'fieldset',
        '#title' => t('Default adjustments'),
        '#description' => t('Enter a positive or negative value for each adjustment applied when this option is selected.<br />Any of these may be overriden at the product level.'),
        '#collapsible' => FALSE,
        '#weight' => 8,
    );
    $form['adjustments']['cost'] = array(
        '#type' => 'textfield',
        '#title' => t('Cost'),
        '#default_value' => uc_store_format_price_field_value($option->cost),
        '#weight' => 1,
    );
    $form['adjustments']['price'] = array(
        '#type' => 'textfield',
        '#title' => t('Price'),
        '#default_value' => uc_store_format_price_field_value($option->price),
        '#weight' => 2,
    );
    $form['adjustments']['weight'] = array(
        '#type' => 'textfield',
        '#title' => t('Weight'),
        '#default_value' => $option->weight,
        '#weight' => 3,
    );
    if (isset($form['oid'])) {
        $form['bulk_update'] = array(
            '#type' => 'checkbox',
            '#title' => t('Update existing products?'),
            '#description' => t('If selected, existing products and product classes with this attribute will be updated with the values on this page.<br /><em><strong>Warning:</strong> any option adjustments set at the product level will be overridden!</em>'),
            '#default_value' => 0,
            '#weight' => 4,
        );
    }
    $form['submit'] = array(
        '#type' => 'submit',
        '#value' => t('Submit'),
        '#suffix' => l(t('Cancel'), 'admin/store/attributes/' . $aid . '/options'),
        '#weight' => 10,
    );

    return $form;
}

/**
 * Validates number formats.
 *
 * @see uc_attribute_option_form()
 * @see uc_attribute_option_form_submit()
 */
function uc_attribute_option_form_validate($form, &$form_state) {
    $pattern = '/^-?\d*(\.\d*)?$/';
    $price_error = t('This must be in a valid number format. No commas and only one decimal point.');
    if (!is_numeric($form_state['values']['cost']['#value']) && !preg_match($pattern, $form_state['values']['cost']['#value'])) {
        form_set_error('cost', $price_error);
    }
    if (!is_numeric($form_state['values']['price']['#value']) && !preg_match($pattern, $form_state['values']['price']['#value'])) {
        form_set_error('price', $price_error);
    }
    if (!is_numeric($form_state['values']['weight']['#value']) && !preg_match($pattern, $form_state['values']['weight']['#value'])) {
        form_set_error('weight', $price_error);
    }
}

/**
 * Form submission handler for uc_attribute_option_form().
 *
 * @see uc_attribute_option_form()
 * @see uc_attribute_option_form_validate()
 */
function uc_attribute_option_form_submit($form, &$form_state) {
    if (!isset($form_state['values']['oid'])) {
        db_query("INSERT INTO {uc_attribute_options} (aid, name, cost, price, weight, ordering) VALUES (%d, '%s', %f, %f, %f, %d)", $form_state['values']['aid'], $form_state['values']['name'], $form_state['values']['cost'], $form_state['values']['price'], $form_state['values']['weight'], $form_state['values']['ordering']);
        $form_state['values']['oid'] = db_last_insert_id('uc_attribute_options', 'oid');
        drupal_set_message(t('Created new option %option.', array('%option' => $form_state['values']['name'])));
        watchdog('uc_attribute', 'Created new option %option.', array('%option' => $form_state['values']['name']), WATCHDOG_NOTICE, 'admin/store/attributes/' . $form_state['values']['aid'] . '/options/add');
        $form_state['redirect'] = 'admin/store/attributes/' . $form_state['values']['aid'] . '/options/add';
    } else {
        db_query("UPDATE {uc_attribute_options} SET name = '%s', cost = %f, price = %f, weight = %f, ordering = %d WHERE aid = %d AND oid = %d", $form_state['values']['name'], $form_state['values']['cost'], $form_state['values']['price'], $form_state['values']['weight'], $form_state['values']['ordering'], $form_state['values']['aid'], $form_state['values']['oid']);
        drupal_set_message(t('Updated option %option.', array('%option' => $form_state['values']['name'])));
        if ($form_state['values']['bulk_update']) {
            db_query("UPDATE {uc_product_options} SET cost = '%f', price = '%f', weight = '%f', ordering = '%d' WHERE oid = '%d'", $form_state['values']['cost'], $form_state['values']['price'], $form_state['values']['weight'], $form_state['values']['ordering'], $form_state['values']['oid']);
            db_query("UPDATE {uc_class_attribute_options} SET cost = '%f', price = '%f', weight = '%f', ordering = '%d' WHERE oid = '%d'", $form_state['values']['cost'], $form_state['values']['price'], $form_state['values']['weight'], $form_state['values']['ordering'], $form_state['values']['oid']);
            drupal_set_message(t('Bulk updates applied to all products and classes which have this attribute.'));
            watchdog('uc_attribute', 'Updated option %option for all products and classes.', array('%option' => $form_state['values']['name']), WATCHDOG_NOTICE, 'admin/store/attributes/' . $form_state['values']['aid'] . '/options/' . $form_state['values']['oid']);
        } else {
            watchdog('uc_attribute', 'Updated option %option.', array('%option' => $form_state['values']['name']), WATCHDOG_NOTICE, 'admin/store/attributes/' . $form_state['values']['aid'] . '/options/' . $form_state['values']['oid']);
        }
        $form_state['redirect'] = 'admin/store/attributes/' . $form_state['values']['aid'] . '/options';
    }
}

/**
 * Confirms deletion of the given attribute option.
 *
 * @see uc_attribute_option_delete_confirm_submit()
 */
function uc_attribute_option_delete_confirm($form_state, $attribute, $option) {
    if (empty($option)) {
        drupal_set_message(t('There is no option with that ID.'), 'error');
        drupal_goto('admin/store/attributes/' . $attribute->aid . '/options');
    }
    $aid = $attribute->aid;
    $oid = $option->oid;

    $form['aid'] = array('#type' => 'value', '#value' => $aid);
    $form['oid'] = array('#type' => 'value', '#value' => $oid);

    $output = confirm_form($form, t('Are you sure you want to delete the option %name?', array('%name' => $option->name)), 'admin/store/attributes/' . $aid . '/options', '', t('Delete'), t('Cancel'));

    return $output;
}

/**
 * Form submission handler for uc_attribute_option_delete_confirm().
 *
 * @see uc_attribute_option_delete_confirm()
 */
function uc_attribute_option_delete_confirm_submit($form, &$form_state) {
    if ($form_state['values']['confirm']) {
        $match = 'i:' . $form_state['values']['aid'] . ';s:' . strlen($form_state['values']['oid']) . ':"' . $form_state['values']['oid'] . '";';
        db_query("DELETE FROM {uc_product_adjustments} WHERE combination LIKE '%%%s%%'", $match);
        db_query("DELETE FROM {uc_class_attribute_options} WHERE EXISTS (SELECT * FROM {uc_attribute_options} AS ao WHERE {uc_class_attribute_options}.oid = ao.oid AND ao.oid = %d)", $form_state['values']['oid']);
        db_query("DELETE FROM {uc_product_options} WHERE EXISTS (SELECT * FROM {uc_attribute_options} AS ao WHERE {uc_product_options}.oid = ao.oid AND ao.oid = %d)", $form_state['values']['oid']);
        db_query("DELETE FROM {uc_attribute_options} WHERE oid = %d", $form_state['values']['oid']);
    }
    $form_state['redirect'] = 'admin/store/attributes/' . $form_state['values']['aid'] . '/options';
}

/**
 * Form to associate attributes with products or classes.
 *
 * @see uc_object_attributes_form_submit()
 * @see uc_object_attributes_form_reset()
 * @see theme_uc_object_attributes_form()
 * @ingroup forms
 */
function uc_object_attributes_form($form_state, $object, $type, $view = 'overview') {
    switch ($type) {
        case 'class':
            $class = $object;
            $id = $class->pcid;
            if (empty($class->name)) {
                drupal_goto('admin/store/products/classes/' . $id);
            }
            drupal_set_title(check_plain($class->name));
            $attributes = uc_class_get_attributes($id);
            break;
        case 'product':
        default:
            $product = $object;
            $id = $product->nid;
            if (empty($product->title)) {
                drupal_goto('node/' . $id);
            }
            drupal_set_title(check_plain($product->title));
            $attributes = uc_product_get_attributes($id);
    }

    $used_aids = array();
    foreach ($attributes as $attribute) {
        $used_aids[] = $attribute->aid;
    }

    if ($view == 'overview') {
        $form['#tree'] = TRUE;

        $form['attributes'] = array();

        $context = array(
            'revision' => 'themed',
            'type' => 'attribute_option',
        );
        if (count($attributes) > 0) {
            foreach ($attributes as $attribute) {
                $option = isset($attribute->options[$attribute->default_option]) ? $attribute->options[$attribute->default_option] : NULL;
                $context['subject'] = array(
                    'attribute' => $attribute,
                    'option' => $option,
                );

                $form['attributes'][$attribute->aid] = array(
                    'remove' => array(
                        '#type' => 'checkbox',
                        '#default_value' => 0,
                    ),
                    'name' => array(
                        '#value' => check_plain($attribute->name),
                    ),
                    'label' => array(
                        '#type' => 'textfield',
                        '#default_value' => empty($attribute->label) ? $attribute->name : $attribute->label,
                        '#size' => 6,
                    ),
                    'option' => array(
                        '#value' => $option ? (check_plain($option->name) . ' (' . uc_price($option->price, $context) . ')' ) : t('n/a'),
                    ),
                    'required' => array(
                        '#type' => 'checkbox',
                        '#default_value' => $attribute->required,
                    ),
                    'ordering' => array(
                        '#type' => 'weight',
                        '#delta' => 25,
                        '#default_value' => $attribute->ordering,
                        '#attributes' => array('class' => 'uc-attribute-table-ordering'),
                    ),
                    'display' => array(
                        '#type' => 'select',
                        '#default_value' => $attribute->display,
                        '#options' => _uc_attribute_display_types(),
                    ),
                );
            }

            $form['save'] = array(
                '#type' => 'submit',
                '#value' => t('Save changes'),
                '#weight' => -2,
            );
        }
        if ($type == 'product') {
            $form['reset'] = array(
                '#type' => 'submit',
                '#value' => t('Reset to defaults'),
                '#submit' => array('uc_object_attributes_form_reset'),
                '#weight' => -1,
            );
        }
    } elseif ($view == 'add') {
        // Get list of attributes not already assigned to this node or class.
        $unused_attributes = array();
        $result = db_query("SELECT a.aid, a.name, a.label FROM {uc_attributes} AS a LEFT JOIN {uc_attribute_options} AS ao ON a.aid = ao.aid GROUP BY a.aid, a.name, a.label ORDER BY a.name");
        while ($attribute = db_fetch_object($result)) {
            if (!in_array($attribute->aid, $used_aids)) {
                $unused_attributes[$attribute->aid] = $attribute->name;
            }
        }

        $form['add_attributes'] = array(
            '#type' => 'select',
            '#title' => t('Attributes'),
            '#description' => t('Hold Ctrl + click to select multiple attributes.'),
            '#options' => count($unused_attributes) > 0 ? $unused_attributes : array(t('No attributes left to add.')),
            '#disabled' => count($unused_attributes) == 0 ? TRUE : FALSE,
            '#multiple' => TRUE,
            '#weight' => -1
        );
        $form['add'] = array(
            '#type' => 'submit',
            '#value' => t('Add attributes'),
            '#suffix' => l(t('Cancel'), $type == 'product' ? 'node/' . $id . '/edit/attributes' : 'admin/store/products/classes/' . $class->pcid . '/attributes'),
            '#weight' => 0,
        );
    }

    $form['id'] = array(
        '#type' => 'value',
        '#value' => $id,
    );
    $form['type'] = array(
        '#type' => 'value',
        '#value' => $type,
    );
    $form['view'] = array(
        '#type' => 'value',
        '#value' => $view,
    );

    return $form;
}

/**
 * Displays the formatted attribute form.
 *
 * @see uc_object_attributes_form()
 * @ingroup themeable
 */
function theme_uc_object_attributes_form($form) {
    $output = '';

    if ($form['view']['#value'] == 'overview') {
        $header = array(t('Remove'), t('Name'), t('Label'), t('Default'), t('Required'), t('List position'), t('Display'));

        if (count(element_children($form['attributes'])) > 0) {
            foreach (element_children($form['attributes']) as $aid) {
                $row = array(
                    drupal_render($form['attributes'][$aid]['remove']),
                    drupal_render($form['attributes'][$aid]['name']),
                    drupal_render($form['attributes'][$aid]['label']),
                    drupal_render($form['attributes'][$aid]['option']),
                    drupal_render($form['attributes'][$aid]['required']),
                    drupal_render($form['attributes'][$aid]['ordering']),
                    drupal_render($form['attributes'][$aid]['display']),
                );

                $rows[] = array(
                    'data' => $row,
                    'class' => 'draggable',
                );
            }
        } else {
            $rows[] = array(
                array('data' => t('You must first <a href="!url">add attributes to this !type</a>.', array('!url' => request_uri() . '/add', '!type' => $form['type']['#value'])), 'colspan' => 6),
            );
        }

        drupal_add_tabledrag('uc-attribute-table', 'order', 'sibling', 'uc-attribute-table-ordering');
        $output = theme('table', $header, $rows, array('id' => 'uc-attribute-table'));
    } else {
        $output = '<div class="uc-attributes-add-link">';
        $output .= t('You may add more attributes <a href="!url">here</a>.', array('!url' => url('admin/store/attributes/add')));
        $output .= '</div>';
    }

    $output .= drupal_render($form);

    return $output;
}

/**
 * Form submission handler for uc_object_attributes_form().
 *
 * @see uc_object_attributes_form()
 */
function uc_object_attributes_form_submit($form, &$form_state) {
    if ($form_state['values']['type'] == 'product') {
        $attr_table = '{uc_product_attributes}';
        $opt_table = '{uc_product_options}';
        $id = 'nid';
        $sql_type = '%d';
    } elseif ($form_state['values']['type'] == 'class') {
        $attr_table = '{uc_class_attributes}';
        $opt_table = '{uc_class_attribute_options}';
        $id = 'pcid';
        $sql_type = "'%s'";
    }

    $changed = FALSE;

    if ($form_state['values']['view'] == 'overview' && is_array($form_state['values']['attributes'])) {
        foreach ($form_state['values']['attributes'] as $aid => $attribute) {
            if ($attribute['remove']) {
                $remove_aids[] = $aid;
            } else {
                db_query("UPDATE $attr_table SET label = '%s', ordering = %d, required = %d, display = %d WHERE aid = %d AND $id = $sql_type", $attribute['label'], $attribute['ordering'], $attribute['required'], $attribute['display'], $aid, $form_state['values']['id']);
                $changed = TRUE;
            }
        }

        if (isset($remove_aids)) {
            $id_value = $form_state['values']['id'];
            $remove_aids_value = implode(', ', $remove_aids);

            db_query("DELETE FROM $opt_table WHERE EXISTS (SELECT * FROM {uc_attribute_options} AS ao WHERE $opt_table.oid = ao.oid AND ao.aid IN (%s)) AND $opt_table.$id = $sql_type", $remove_aids_value, $id_value);
            db_query("DELETE FROM $attr_table WHERE $id = $sql_type AND aid IN (%s)", $id_value, $remove_aids_value);
            if ($form_state['values']['type'] == 'product') {
                db_query("DELETE FROM {uc_product_adjustments} WHERE nid = %d", $id_value);
            }

            drupal_set_message(format_plural(count($remove_aids), '@count attribute has been removed.', '@count attributes have been removed.'));
        }

        if ($changed) {
            drupal_set_message(t('The changes have been saved.'));
        }
    } elseif ($form_state['values']['view'] == 'add') {
        foreach ($form_state['values']['add_attributes'] as $aid) {
            // Enable all options for added attributes.
            $attribute = uc_attribute_load($aid);
            foreach ($attribute->options as $option) {
                db_query("INSERT INTO $opt_table ($id, oid, cost, price, weight, ordering) VALUES ($sql_type, %d, %f, %f, %f, %d)", $form_state['values']['id'], $option->oid, $option->cost, $option->price, $option->weight, $option->ordering);
            }
            // Make the first option (if any) the default.
            $option = reset($attribute->options);
            if ($option) {
                $oid = $option->oid;
            } else {
                $oid = 0;
            }
            db_query("INSERT INTO $attr_table ($id, aid, label, ordering, default_option, required, display) SELECT $sql_type, aid, label, ordering, %d, required, display FROM {uc_attributes} WHERE aid = %d", $form_state['values']['id'], $oid, $aid);
        }
        if (count($form_state['values']['add_attributes']) > 0) {
            if ($form_state['values']['type'] == 'product') {
                db_query("DELETE FROM {uc_product_adjustments} WHERE nid = %d", $form_state['values']['id']);
            }
            drupal_set_message(format_plural(count($form_state['values']['add_attributes']), '@count attribute has been added.', '@count attributes have been added.'));
        }
    }

    if ($form_state['values']['type'] == 'product') {
        $form_state['redirect'] = 'node/' . $form_state['values']['id'] . '/edit/attributes';
    } else {
        $form_state['redirect'] = 'admin/store/products/classes/' . $form_state['values']['id'] . '/attributes';
    }
}

/**
 * Reset product attributes to defaults for product class.
 *
 * @see uc_object_attributes_form_reset()
 */
function uc_object_attributes_form_reset($form, &$form_state) {
    $form_state['redirect'] = array('node/' . $form_state['values']['id'] . '/edit/attributes/reset');
}

/**
 * Confirmation form to reset product attributes to defaults.
 *
 * @see uc_object_attributes_form()
 * @see uc_attribute_node_reset_confirm_submit()
 */
function uc_attribute_node_reset_confirm(&$form_state, $node) {
    $form['nid'] = array(
        '#type' => 'value',
        '#value' => $node->nid,
    );

    return confirm_form($form, t('Are you sure you want to reset the product attributes and options for %title?', array('%title' => $node->title)), 'node/' . $node->nid . '/edit/attributes', t('This action cannot be undone.'), t('Reset'), t('Cancel')
    );
}

/**
 * Execute product attribute reset.
 *
 * @see uc_attribute_node_reset_confirm()
 */
function uc_attribute_node_reset_confirm_submit($form, &$form_state) {
    $nid = $form_state['values']['nid'];
    $node = node_load($nid);
    uc_attribute_node_reset($node);
    drupal_set_message(t('Product attributes and options reset to class defaults.'));

    $form_state['redirect'] = 'node/' . $node->nid . '/edit/attributes';
}

/**
 * Form to assign and modify attribute options on products or classes.
 *
 * @see uc_object_options_form_validate()
 * @see uc_object_options_form_submit()
 * @see theme_uc_object_options_form()
 * @ingroup forms
 */
function uc_object_options_form($form_state, $object, $type) {
    if ($type == 'product') {
        $product = $object;
        $id = $product->nid;
        drupal_set_title(check_plain($product->title));
        $attributes = uc_product_get_attributes($id);
        $table = '{uc_product_options}';
        $id_type = 'nid';
        $sql_type = db_type_placeholder('int');
    } elseif ($type == 'class') {
        $class = $object;
        $id = $class->pcid;
        drupal_set_title(check_plain($class->name));
        $attributes = uc_class_get_attributes($id);
        $table = '{uc_class_attribute_options}';
        $id_type = 'pcid';
        $sql_type = db_type_placeholder('varchar');
    }

    foreach ($attributes as $aid => $attribute) {
        $form['attributes'][$aid]['name'] = array(
            '#value' => check_plain($attribute->name),
        );
        $form['attributes'][$aid]['aid'] = array(
            '#type' => 'hidden',
            '#value' => $attribute->aid,
        );
        $form['attributes'][$aid]['ordering'] = array(
            '#type' => 'value',
            '#value' => $attribute->ordering,
        );

        $form['attributes'][$aid]['options'] = array('#weight' => 2);

        $base_attr = uc_attribute_load($attribute->aid);

        if ($base_attr->options) {
            $options = array();

            $result = db_query("SELECT ao.aid, ao.oid, ao.name, ao.cost AS default_cost, ao.price AS default_price, ao.weight AS default_weight, ao.ordering AS default_ordering, po.cost, po.price, po.weight, po.ordering, po.ordering IS NULL AS null_order FROM {uc_attribute_options} AS ao LEFT JOIN $table AS po ON ao.oid = po.oid AND po." . $id_type . " = " . $sql_type . " WHERE aid = %d ORDER BY null_order, po.ordering, default_ordering, ao.name", $id, $attribute->aid);
            while ($option = db_fetch_object($result)) {
                $oid = $option->oid;
                $options[$oid] = '';

                $form['attributes'][$aid]['options'][$oid]['select'] = array(
                    '#type' => 'checkbox',
                    '#default_value' => isset($attribute->options[$oid]) ? TRUE : FALSE,
                    '#title' => check_plain($option->name),
                );
                $form['attributes'][$aid]['options'][$oid]['cost'] = array(
                    '#type' => 'textfield',
                    '#default_value' => uc_store_format_price_field_value(is_null($option->cost) ? $option->default_cost : $option->cost),
                    '#size' => 6,
                );
                $form['attributes'][$aid]['options'][$oid]['price'] = array(
                    '#type' => 'textfield',
                    '#default_value' => uc_store_format_price_field_value(is_null($option->price) ? $option->default_price : $option->price),
                    '#size' => 6,
                );
                $form['attributes'][$aid]['options'][$oid]['weight'] = array(
                    '#type' => 'textfield',
                    '#default_value' => is_null($option->weight) ? $option->default_weight : $option->weight,
                    '#size' => 5,
                );
                $form['attributes'][$aid]['options'][$oid]['ordering'] = array(
                    '#type' => 'weight',
                    '#delta' => 50,
                    '#default_value' => is_null($option->ordering) ? $option->default_ordering : $option->ordering,
                    '#attributes' => array('class' => 'uc-attribute-option-table-ordering'),
                );
            }

            $form['attributes'][$aid]['default'] = array(
                '#type' => 'radios',
                '#options' => $options,
                '#default_value' => /* $attribute->required ? NULL : */ $attribute->default_option,
                    //'#disabled' => $attribute->required,
            );
        } else {
            $form['attributes'][$aid]['default'] = array(
                '#value' => t('This attribute does not have any options.'),
            );
        }
    }

    if (!empty($form['attributes'])) {
        $form['attributes']['#tree'] = TRUE;

        $form['submit'] = array(
            '#type' => 'submit',
            '#value' => t('Submit'),
            '#weight' => 10,
        );
    }

    $form['id'] = array(
        '#type' => 'value',
        '#value' => $id,
    );
    $form['type'] = array(
        '#type' => 'value',
        '#value' => $type,
    );

    return $form;
}

/**
 * Displays the option form.
 *
 * @see uc_object_options_form()
 * @ingroup themeable
 */
function theme_uc_object_options_form($form) {
    $output = '';

    $header = array(array('data' => '&nbsp;&nbsp;' . t('Options')) + theme('table_select_header_cell'), t('Default'), t('Cost'), t('Price'), t('Weight'), t('List position'));
    $table_id_num = $tables = 0;

    foreach (element_children($form['attributes']) as $key) {

        $rows = array();

        if (element_children($form['attributes'][$key]['default'])) {

            foreach (element_children($form['attributes'][$key]['default']) as $oid) {
                $row = array(
                    drupal_render($form['attributes'][$key]['options'][$oid]['select']),
                    drupal_render($form['attributes'][$key]['default'][$oid]),
                    drupal_render($form['attributes'][$key]['options'][$oid]['cost']),
                    drupal_render($form['attributes'][$key]['options'][$oid]['price']),
                    drupal_render($form['attributes'][$key]['options'][$oid]['weight']),
                    drupal_render($form['attributes'][$key]['options'][$oid]['ordering']),
                );

                $rows[] = array(
                    'data' => $row,
                    'class' => 'draggable',
                );
            }
            $table_id = 'uc-attribute-option-table-' . $table_id_num++;
            drupal_add_tabledrag($table_id, 'order', 'sibling', 'uc-attribute-option-table-ordering');
        } else {
            $row = array();
            $row[] = array('data' => drupal_render($form['attributes'][$key]['default']), 'colspan' => 6);
            $rows[] = $row;
        }

        if (!count($rows)) {
            $rows[] = array(array('data' => t('This !type does not have any attributes.', array('!type' => $form['type']['#value'] == 'product' ? t('product') : t('product class'))), 'colspan' => 6));
        }


        $output .= theme('table', $header, $rows, array('class' => 'product_attributes', 'id' => $table_id), '<h2>' . drupal_render($form['attributes'][$key]['name']) . '</h2>');

        $tables++;
    }

    if (!$tables) {

        $output .= '<br /><br />';
        if ($form['type']['#value'] == 'product') {
            drupal_set_message(t('This product does not have any attributes.'), 'warning');
        } else {
            drupal_set_message(t('This product class does not have any attributes.'), 'warning');
        }
    }

    $output .= drupal_render($form);

    return $output;
}

/**
 * Returns a themed set of attribute options for use in order displays.
 *
 * @param $element
 *   Structured array containing the set of attributes with each element
 *   having a key of attribute ID and the following keys:
 *     #attribute_name - Attribute name
 *     #options - Array of option names
 *
 * @return
 *   Themed set of attribute options.
 */
function theme_uc_product_attributes($element) {
    $option_rows = array();

    foreach (element_children($element) as $key) {
        $optionstr = '';

        foreach ((array) $element[$key]['#options'] as $option) {
            // We only need to allow translation from the second option onward
            if (empty($optionstr)) {
                $optionstr .= $option;
            } else {
                $optionstr .= t(', !option', array('!option' => $option));
            }
        }
        $option_rows[$key] = t('@attribute: @option', array('@attribute' => $element[$key]['#attribute_name'], '@option' => $optionstr));
    }

    if (!empty($option_rows)) {
        return theme('item_list', array_values($option_rows), NULL, 'ul', array('class' => 'product-description'));
    }

    return '';
}

/**
 * Makes sure that all selected default options are enabled.
 *
 * @see uc_object_options_form()
 * @see uc_object_options_form_submit()
 */
function uc_object_options_form_validate($form, &$form_state) {
    $error = FALSE;

    if (isset($form_state['values']['attributes'])) {
        foreach ($form_state['values']['attributes'] as $aid => $attribute) {
            $selected_opts = array();
            if (isset($attribute['options'])) {
                foreach ($attribute['options'] as $oid => $option) {
                    if ($option['select'] == 1) {
                        $selected_opts[] = $oid;
                    }
                }
            }
            if (!empty($selected_opts) && !isset($form['attributes'][$aid]['default']['#disabled']) && !in_array($attribute['default'], $selected_opts)) {
                form_set_error($attribute['default']);
                $error = TRUE;
            }
        }
    }

    if ($error) {
        drupal_set_message(t('All attributes with enabled options must specify an enabled option as default.'), 'error');
    }
}

/**
 * Form submission handler for uc_object_options_form().
 *
 * @see uc_object_options_form()
 * @see uc_object_options_form_validate()
 */
function uc_object_options_form_submit($form, &$form_state) {
    if ($form_state['values']['type'] == 'product') {
        $attr_table = '{uc_product_attributes}';
        $opt_table = '{uc_product_options}';
        $id = 'nid';
        $sql_type = '%d';
    } elseif ($form_state['values']['type'] == 'class') {
        $attr_table = '{uc_class_attributes}';
        $opt_table = '{uc_class_attribute_options}';
        $id = 'pcid';
        $sql_type = "'%s'";
    }

    foreach ($form_state['values']['attributes'] as $attribute) {
        if (isset($attribute['default'])) {
            db_query("UPDATE $attr_table SET default_option = %d WHERE $id = $sql_type AND aid = %d", $attribute['default'], $form_state['values']['id'], $attribute['aid']);
        }

        if (isset($attribute['options'])) {
            foreach ($attribute['options'] as $oid => $option) {
                db_query("DELETE FROM $opt_table WHERE $id = $sql_type AND oid = %d", $form_state['values']['id'], $oid);

                if ($option['select']) {
                    db_query("INSERT INTO $opt_table ($id, oid, cost, price, weight, ordering) VALUES ($sql_type, %d, %f, %f, %f, %d)", $form_state['values']['id'], $oid, $option['cost'], $option['price'], $option['weight'], $option['ordering']);
                } elseif ($form_state['values']['type'] == 'product') {
                    $aid = $attribute['aid'];
                    $match = 'i:' . $aid . ';s:' . strlen($oid) . ':"' . $oid . '";';
                    db_query("DELETE FROM {uc_product_adjustments} WHERE nid = %d AND combination LIKE '%%%s%%'", $form_state['values']['id'], $match);
                }
            }
        }
    }

    drupal_set_message(t('The !type options have been saved.', array('!type' => $form_state['values']['type'] == 'product' ? t('product') : t('product class'))));

    if ($form_state['values']['type'] == 'product') {
        // Clear the page and block caches.
        cache_clear_all();
    }
}

/**
 * Form builder to associate option combinations with mutations of a
 * product's model number.
 *
 * @see uc_product_adjustments_form_submit()
 * @ingroup forms
 */
function uc_product_adjustments_form($form_state, $node) {
    drupal_set_title(check_plain($node->title));
    $nid = $node->nid;

    //Populate table and such.
    $model = $node->model;
    $query_select = "SELECT DISTINCT";
    $query_from = " FROM";
    $query_where = " WHERE";
    $query_order = " ORDER BY";
    $result = db_query("SELECT pa.nid, pa.aid, pa.ordering, pa.display, a.name, a.ordering, ao.aid, COUNT(po.oid) FROM {uc_product_attributes} AS pa LEFT JOIN {uc_attributes} AS a ON pa.aid = a.aid LEFT JOIN {uc_attribute_options} AS ao ON a.aid = ao.aid LEFT JOIN {uc_product_options} AS po ON ao.oid = po.oid AND po.nid = %d WHERE pa.nid = %d AND pa.display <> 3 GROUP BY ao.aid, pa.aid, pa.display, a.name, pa.ordering, a.ordering, pa.nid HAVING count(po.oid) > 0 ORDER BY pa.ordering, a.ordering", $nid, $nid);
    $i = 1;
    $attribute_names = '';
    $full_attributes = array();
    $values = array();

    while ($prod_attr = db_fetch_object($result)) {
        $query_select .= " ao$i.aid AS aid$i, ao$i.name AS name$i, ao$i.oid AS oid$i, po$i.ordering,";
        $query_from .= " ({uc_product_options} AS po$i LEFT JOIN {uc_attribute_options} AS ao$i ON po$i.oid = ao$i.oid AND po$i.nid = %d),";
        $values[] = $nid;
        $query_where .= " ao$i.aid = " . $prod_attr->aid . " AND";
        $query_order .= " po$i.ordering, ao$i.name,";
        ++$i;
        $attribute_names .= '<th>' . check_plain($prod_attr->name) . '</th>';
        $attribute_ids[] = $prod_attr->aid;
    }
    $num_prod_attr = count($attribute_ids);

    // Remove last connecting parts (commas, "AND")
    $query_select = rtrim($query_select, ',');
    $query_from = rtrim($query_from, ',');
    $query_where = substr($query_where, 0, strlen($query_where) - 4);
    $query_order = rtrim($query_order, ',');

    if ($num_prod_attr) {
        //Get previous values
        $result = db_query("SELECT * FROM {uc_product_adjustments} WHERE nid = %d", $nid);
        $old_vals = array();
        while ($obj = db_fetch_object($result)) {
            $old_vals[] = $obj;
        }

        $result = pager_query($query_select . $query_from . $query_where . $query_order, 20, 0, NULL, $values);

        $form['original'] = array(
            '#value' => '<div><br /><b>' . t('Default product SKU: @sku', array('@sku' => $model)) . '</b></div>',
        );
        $form['default'] = array(
            '#type' => 'value', '#value' => $model,
        );
        $form['table'] = array(
            '#prefix' => '<table class="combinations">',
            '#suffix' => '</table>',
        );
        $form['table']['head'] = array(
            '#prefix' => '<thead><tr>',
            '#suffix' => '</tr></thead>',
            '#value' => $attribute_names . '<th>' . t('Alternate SKU') . '</th>',
            '#weight' => 0,
        );
        $form['table']['body'] = array(
            '#prefix' => '<tbody>',
            '#suffix' => '</tbody>',
            '#weight' => 1,
            '#tree' => TRUE,
        );

        $i = 0;
        while ($combo = db_fetch_object($result)) {
            $cells = '';
            $row_title = '';
            $comb_array = array();
            for ($j = 1; $j <= $num_prod_attr; ++$j) {
                $cells .= '<td>' . check_plain($combo->{'name' . $j}) . '</td>';
                $row_title .= check_plain($combo->{'name' . $j}) . ', ';
                $comb_array[$combo->{'aid' . $j}] = $combo->{'oid' . $j};
            }
            ksort($comb_array);
            $row_title = substr($row_title, 0, strlen($row_title) - 2);
            $default_model = $model;
            foreach ($old_vals as $ov) {
                if (!count(array_diff_assoc(unserialize($ov->combination), $comb_array))) {
                    $default_model = $ov->model;
                    break;
                }
            }

            $form['table']['body'][$i] = array(
                '#prefix' => '<tr title="' . $row_title . '">',
                '#suffix' => '</tr>',
            );
            $form['table']['body'][$i]['combo'] = array(
                '#value' => $cells,
            );
            $form['table']['body'][$i]['combo_array'] = array(
                '#type' => 'value',
                '#value' => serialize($comb_array),
            );
            $form['table']['body'][$i]['model'] = array(
                '#type' => 'textfield',
                '#default_value' => $default_model,
                '#prefix' => '<td>',
                '#suffix' => '</td>',
            );
            ++$i;
        }

        $form['nid'] = array(
            '#type' => 'hidden',
            '#value' => $nid,
        );
        $form['submit'] = array(
            '#type' => 'submit',
            '#value' => t('Submit'),
        );
    } else {
        $form['error'] = array(
            '#value' => '<div><br />' . t('This product does not have any attributes.') . '</div>',
        );
    }

    $form['pager'] = array(
        '#value' => theme('pager'),
    );

    return $form;
}

/**
 * Form builder for uc_product_adjustments_form().
 *
 * @see uc_product_adjustments_form()
 */
function uc_product_adjustments_form_submit($form, &$form_state) {
    foreach ($form_state['values']['body'] as $value) {
        db_query("DELETE FROM {uc_product_adjustments} WHERE nid = %d AND combination = '%s'", $form_state['values']['nid'], $value['combo_array']);
        if (!empty($value['model']) && $value['model'] != $form_state['values']['default']) {
            db_query("INSERT INTO {uc_product_adjustments} (nid, combination, model) VALUES (%d, '%s', '%s')", $form_state['values']['nid'], $value['combo_array'], $value['model']);
        }
    }
    drupal_set_message(t('Product adjustments have been saved.'));
    $goto = array($_GET['q']);
    if (isset($_GET['page'])) {
        $goto[] = 'page=' . $_GET['page'];
    }
    $form_state['redirect'] = $goto;
}
